home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 07 - 1991 / 07.02 Feb 91 / 4th Debugger Appl / SetCalendar.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-02-15  |  906 b   |  26 lines  |  [TEXT/KAHL]
  1. /************************************************************************/
  2. /*                                                                          */
  3. /*    Source   - SetCalendar.c                                            */
  4. /*    Author   - Alexander S. Colwell, Copyright © 1990                    */
  5. /*                                                                        */
  6. /*    Purpose     - This is Calendar simulator.                                */
  7. /*                                                                        */
  8. /************************************************************************/
  9.  
  10. #include "Calendar.h"                /* Calendar defs                    */
  11.  
  12. #ifndef    ExtArea                        /* Check if debugging mode            */
  13. #undef  main                        /* Remove previous definition        */
  14. #define    main SetCalendar            /* Set debugging procedure name        */
  15. #endif
  16.  
  17. pascal void main(CCalendar **eaObject,
  18.                  short *itsMonth, short *itsYear, long *itsSelect)
  19.     {
  20.         (*eaObject)->dirty = TRUE;    /* Mark external area dirty            */
  21.         
  22.         (*eaObject)->month = *itsMonth;/* Reset calendar date/selection */
  23.         (*eaObject)->year = *itsYear;
  24.         (*eaObject)->daySelect = *itsSelect;
  25.     }
  26.